home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / cafe / ultslots.dir / 00048.ls < prev    next >
Encoding:
Text File  |  1996-10-06  |  185 b   |  14 lines
  1. on mouseUp
  2.   global kiosk
  3.   if kiosk = 1 then
  4.     go("OPEN")
  5.   else
  6.     set x to random(2)
  7.     if x = 1 then
  8.       go("CHECK KIOSK")
  9.     else
  10.       go("PLANT2")
  11.     end if
  12.   end if
  13. end
  14.